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-- file PlDefs.Mesa 

-- last modified by Satterthwaite, January 19, 1978 1:36 PM 

DIRECTORY 

StreamDefs: FROM "streamdef s'* , 
SymDefs: FROM "symdefs", 
LALRDefs: FROM "lalrdefs"; 

PlDefs: DEFINITIONS SHARES LALRDefs ■ 
BEGIN 
OPEN LALRDefs; 

-- implemented by Passl 
Lockid: PROCEDURE RETURNS [SymDefs .HTIndex]; 

-- implemented by Scan 
Atom: PROCEDURE RETURNS [SymbolRecord]; 
ErrorContext: PROCEDURE [STRING. CARDINAL]; 
ResetScanlndex: PROCEDURE [CARDINAL]; 

Scanlnit: PROCEDURE [StreamDefs. StreamHandle. POINTER TO LALRTable]; 
ScanReset: PROCEDURE RETURNS [nErrors: CARDINAL]; 

-- implemented by Parse 
Parse: PROCEDURE [StreamDefs .StreamHandle. POINTER TO LALRTable] 

RETURNS [complete: BOOLEAN. nErrors: CARDINAL]; 
ParserlD: PROCEDURE RETURNS [STRING]; 
InputLoc: PROCEDURE RETURNS [CARDINAL]; 

-- implemented by PasslT 
AssignDescriptors: PROCEDURE [ 

qd: DESCRIPTOR FOR ARRAY OF ActionEntry. 

vd: DESCRIPTOR FOR ARRAY OF UNSPECIFIED, 

Id: DESCRIPTOR FOR ARRAY OF CARDINAL, 

pd: DESCRIPTOR FOR ARRAY OF Productioninf o]; 
ProcessQueue: PROCEDURE [ql, top: CARDINAL]; 
TokenValue: PROCEDURE [Symbol] RETURNS [UNSPECIFIED]; 

-- the global frames 
Scanner. Parser, PasslT: PROGRAM; 

END. 


